<%'开始分页
if request("page")="" then
page=1
else
page=cint(request("page"))
end if
Set rs=Server.CreateObject("ADODB.RecordSet")
tt="select * from peijian"
rs.Open tt,conn,1,1
%>
配件市场----台州亚克机电有限公司
<%
if session("name")="" then
%>
<%
else
response.write session("name")&"你好，欢迎你访问我的网站"
end if
%>
首页 > 配件市场
<%
if not rs.eof then
rs.pagesize=20
rs.absolutepage=page
for i=1 to 5
for j=1 to 4
if rs.eof then exit for
%>
